8 POKE51,200:POKE52,105:POKE53,200:POKE54,105:J=PEEK(186) 10 A=A+1:IFA=1THENLOAD"PART 1",J,1 11 B=B+1:IFB=1THENLOAD"PART 2",J,1 12 SYS6196:SYS6246:PRINT"[147]":POKE53265,65 13 PRINT"LOAD"CHR$(34)"PART 3"CHR$(34)",J,1:":PRINT"GOTO15" 14 POKE631,19:POKE632,13:POKE633,13:POKE634,13:POKE198,4:END 15 POKE51,200:POKE52,105:POKE53,200:POKE54,105:LL=PEEK(186):IFLL=1THEN9100 16 OPEN2,8,2,"POINTS,P,R" 17 FORT=1TO10:INPUT#2,N$(T):INPUT#2,HS(T):NEXTT:CLOSE2:GOTO9100 980 PRINT"[147]":POKE53280,0:POKE53281,3:POKE53282,0:POKE53283,13:POKE2040,210 982 POKE53287,1:A=PEEK(1015):POKE53281,3:POKE53265,65:A=A+1:POKE1015,A 983 ONAGOTO1000,3000,8990,4000,5000,8990,5100,5300,8990,5200,993 993 POKE1015,0:POKE53281,0:PRINT"[147]":POKE53269,0:POKE53265,155 994 PRINT"[149] CONGRATULATIONS YOU HAVE DESTROYED" 995 PRINTTAB(15)"ALL ENEMIES" 996 SI=54272:FORI=0TO24:POKESI+I,0:NEXT:POKESI+24,15:POKESI+5,8:POKESI+6,255 997 POKESI+4,23:F2=4:FORZ=1TO5:POKESI+15,F2 998 FORF1=1TO160:POKESI+1,F1:F2=F2+.01:NEXTF1:NEXTZ:POKESI+4,0:GOTO980 1000 PRINT"[147][153] [218] [207] 1001 [153]" (null) (null) (null)LEFT$ (null) (null) (null) (null)(null) (null) (null) 1002 PRINT" [205][206] [218] [203] [205][206][204][200] [205][206] [207][206] [218][197][207] [205][206] [200] 1003 [153]" MID$(null)(null)(null)(null)(null)(null)(null)MID$(null)ASC(null)(null) MID$(null)(null)(null)(null)(null)(null)(null)(null) MID$(null)(null) (null)(null) 1004 PRINT" [202][197][204][202][203][196][197][206][196][197][198][203][204] [199][197][198][198][200][201][200][196][206][204] [202][203][204] [202][206][204] 1005 [153]" CHR$LEFT$RIGHT$MID$LEFT$STR$ASCLEFT$ASCLEFT$STR$VAL(null)LCDEWAITPRINTCHR$LEFT$(null)VAL(null)STR$VALVAL(null)(null) CHR$LEFT$RIGHT$ MID$(null)(null) 1006 PRINT" [199][197][201][202][197][198][200][200][198][200][198][197][201] [196][197][197][196][197][198][200][197][206][201]C[146][153][196][206][198]D[146][153][199][197][201]JKAL[153][146]"; 1007 PRINT" [196][197][198][199][200][196][196][197][198][209][199][203][201] [208][196][203][198][194][196][203][198][206][201] [198][200][196] [199][200][201] 1008 [153]" ASC(null)STR$STR$VALASCVALLEFT$STR$(null)STR$VALASC][][%(null)(null)(null)(null)(null)(null)STR$LEFT$ASC STR$VALASC ASC(null)ASC 1009 PRINT"][208][209][210][196][200][196][196][203][198][[196][206][198]#][^^^#%[!#[210][209][208][[208][209][210]][196][197][198] 1010 [153]"]#%!(null)(null)(null)(null)(null)(null)[(null)(null)(null)!]^^[^[^][^!%#]!##[(null)(null)(null)[CONTNOT__"; 1011 [153]"^^[^!##%##]%##%^]^]^%^[^]^#^^^]^]!#(null)(null)___"; 1012 [153]"^^^]^^^^^[^^]^^^^^]^^^]^\(null)(null)(null)(null)(null)(null)_(null)*(null)_____"; 1013 [153]"(null)_(null)(null)\[^^(null)(null)^^^]^^[^^#^(null)(null)(null)________________"; 1014 [153]"_____(null)*(null)__(null)(null)(null)*(null)(null)(null)^\(null)(null)___________________";:A[178]4:[137]1100 1100 [129]K[178]1[164]A:[153]"CONT________________________________________";:[130] 1101 [153]"_______________________________________";:[151]1024[170]999,31 1102 [151]55296[170]999,6:L[178]21[171][194](907) 1103 [153]"LISTSCORE(null)VERIFY000000(null)(null)LISTE(null)605(null)RATE(null)00(null)VERIFY00(null)(null)LISTLIVES(null)VERIFY03"; 1104 [153]"DEFAMMUNITION(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)";:[139]L[179]10[167]1210 1105 [151]211,24:[151]214,0:[158]58640:[153]"POKE"L"";:[153]"CMDCMDCMDCMD(null)";:[151]53265,155 1106 A[178][194](860):B[178][194](861):SC[178]B[172]256:SC[178]SC[170]A 1107 [139]SC[177]9999[167]1113 1108 [139]SC[177]999[167]1115 1109 [139]SC[177]99[167]1120 1110 [139]SC[177]9[167]1125 1111 C[178]9:D[178]1033 1112 [137]1130 1113 C[178]5:D[178]1035 1114 [137]1130 1115 C[178]6:D[178]1030 1116 [137]1130 1120 C[178]7:D[178]1031 1121 [137]1130 1125 C[178]8:D[178]1032 1130 [151]214,0:[151]211,C:[158]58640 1133 [153]"VERIFY"SC"":[139]SC[177]9999[167][151]1029,94 1135 [151]D,48:A[178][194](896) 1136 [151]211,38:[151]214,0:[158]58640:[153]"VERIFY"A"";:[153]"CMDCMDCMD0"; 1137 A[178][194](1015):[139]A[178]3[176]A[178]6[176]A[178]9[167]1145 1140 [158]27216:[151]53278,0:[158]33681:A[178][194](842):[139]A[178]46[167]1160 1141 A[178][194](40959):[139]A[178]1[167]1143 1142 [137]982 1143 A[178][194](1015):A[178]A[171]1:[151]1015,A:[137]982 1145 [151]53264,0:[158]8192:[151]913,245:[158]33681:[151]913,0:[151]53283,13:[137]982 1160 SC[178][194](861):SC[178]SC[172]256:B[178][194](860):SC[178]SC[170]B:SC[178]SC[172]10:[139]SC[177]HS(10)[167]1167 1161 [137]9100 1167 SC[178]SC[173]10 1168 [153]"LOADVERIFY":[151]53280,15:[151]53281,15:[151]53265,65 1169 [151]214,8:[151]211,6:[158]58640:[151]53282,11:N$[178]"" 1170 [153]"(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)" 1171 [153][163]6)"(null)(null)(null)(null)(null)(null)POKETYPE(null)IN(null)YOUR(null)NAME(null)(null)(null)(null)(null)FOR_" 1172 [153][163]6)"(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)FOR_" 1173 [153][163]6)"(null)LISTA(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)VERIFY000000(null)POINTS(null)FOR_" 1174 [153][163]6)"(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)_" 1175 [153][163]7)"____________________________" 1180 [139]SC[177]9[167]A[178]22:B[178]462 1181 [139]SC[177]99[167]A[178]21:B[178]461 1182 [139]SC[177]999[167]A[178]20:B[178]460 1183 [139]SC[177]9999[167]A[178]19:B[178]459 1184 [151]211,A:[151]214,11:[158]58640:[153]"VERIFY"SC"":[151]1024[170]B,48:[151]1483,94 1185 O[178]7:[151]53265,155 1186 [161]A$:[139]A$[178]""[167]1186 1187 [139]A$[178]""[167]A$[178]"(null)" 1188 [139]A$[178]""[167]1196 1189 [139]A$[178]"LOAD"[167]1169 1190 [139]A$[178]" "[167]1169 1191 C[178][194](197):[139]C[178]1[167]1200 1192 [139]C[178]0[167]1169 1193 [141]1900 1194 [151]211,O:[151]214,11:[158]58640:[153]"LIST"A$"":O[178]O[170]1:[139]O[178]19[167]1197 1195 N$[178]N$[170]A$:[137]1186 1196 [151]211,7:[151]214,11:[158]58640:[153]"(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)(null)";:[137]1185 1197 O[178]O[171]1:[137]1186 1200 [151]53280,0:[151]53281,0:[151]53282,0:[137]9202 1210 [151]211,25:[151]214,0:[158]58640:[153]"POKE"L"";:[153]"CMDCMDCMD0";:[151]53265,155 1211 [137]1106 1900 SI[178]54272:[151]SI[170]24,15:[151]SI[170]23,240:[151]SI[170]6,0:[151]SI[170]5,6 1901 [151]SI[170]11,0:[151]SI[170]18,0:[151]SI[170]4,0:[151]SI[170]1,60:[151]SI[170]15,5:[151]SI[170]4,21 1902 [142] 3000 [153]"LOADPRINT"; 3001 [153]" (null) 3002 PRINT"[218][205][206][207] [218] 3003 [153]"(null)(null)(null)(null) (null) (null) (null) (null) 3004 PRINT"[200][207][196][203] [207][203][204][218][205][206] [207][203] [207] [206] 3005 [153]"(null)(null)ASC(null)(null)(null)VAL(null)VALMID$(null)(null)(null)(null)VAL(null)(null) (null)VAL(null) (null)"; 3006 [153]"ASC(null)ASCSTR$RIGHT$(null)STR$STR$(null)STR$LEFT$RIGHT$MID$(null)VALSTR$(null)(null)MID$(null)RIGHT$ (null) VAL"; 3007 [153]"STR$(null)STR$VALASC(null)VALSTR$LEFT$ASC(null)RIGHT$CHR$(null)STR$VAL(null)RIGHT$CHR$LEFT$RIGHT$ (null)(null) (null)VAL"; 3008 [153]"ASC(null)(null)(null)STR$LEFT$ASCASCLEFT$ASCVALRIGHT$CHR$(null)STR$ASCVALASCSTR$VALRIGHT$ MID$(null)(null)(null)(null)"; 3009 [153]"STR$LEFT$ASCVALASCVALASCSTR$(null)STR$(null)VALSTR$LEFT$VALVAL(null)STR$ASC(null)STR$DEFKLAWAIT LCDEGHIWAITPRINTCHR$VALRIGHT$LEFT$(null)"; 3010 [153]"STR$(null)VAL(null)STR$(null)(null)STR$(null)ASCVALASCASCVALASCVAL(null)ASCASCVALASC CHR$LEFT$STR$VALASC"; 3011 [153]"ASC(null)(null)(null)ASC(null)LEFT$ASC(null)STR$(null)STR$STR$(null)VALSTR$VALASCSTR$(null)(null)CONTPOSFREAND________-=^PRINTASCVALSTR$(null)VAL"; 3012 [153]"STR$VALASCASCSTR$(null)ASCSTR$(null)ASCVALSTR$ASC(null)STR$STR$(null)(null)(null)!^[]CONT]POSCOSCOSAND____(null)(null)]PRINTSTR$LEFT$ASCVALASC"; 3013 [153]"STR$LEFT$(null)(null)ASCLEFT$STR$ASCLEFT$ASC(null)(null)STR$VALASC(null)%!#^[^CONT]\(null)*^(null)_____-[PRINT(null)(null)(null)(null)(null)"; 3014 [153]"ASCSTR$(null)STR$(null)(null)(null)STR$VALASC!#(null)(null)(null)%]CONT](null)^TAB((null)________-FRE=]^#%!(null)^"; 3015 [153]"PRINTSTR$(null)PEEK(null)%%!(null)(null)(null)]][[]]CONT^^POSFREAND_________(null)(null)]\(null)^TAB((null)__"; 3016 [153]"PRINT(null)(null)(null)%[[^%#%^]^]^[CONT^^]^^NOT__________________"; 3017 [153]"#%%!(null)*(null)][]^[^^[^]^^(null)(null)___________________"; 3018 [153]"TAB((null)______(null)(null)\(null)(null)^(null)^TAB(*(null)_____________________";:A[178]2:[137]1100 4000 [153]"LOAD";:[153]"PRINT (null) 4001 PRINT"[218][203][204][218] [218] [218] 4002 [153]"(null)(null)ASC(null) (null)(null)(null)(null)(null) (null) (null) (null) (null) 4003 PRINT"[203][197][198][203][204] [205][206][202][203][204][203][204] [205][206] [205][206] [205][203] [218][205][206] 4004 [153]"LEFT$ASCSTR$LEFT$RIGHT$EFKPRINTWAITMID$(null)STR$VALASC(null)(null)CKLPRINTWAIT(null)(null)(null)CDKLWAITDEFORSINLOG*>RND PRINTMID$(null)(null)(null)MID$(null)(null)"; 4005 [153]"VAL(null)STR$VALASC MID$LEFT$STR$VALASCLEFT$RIGHT$ MID$(null)RIGHT$ LISTFNSGNVERIFYNEWLISTINTGETABS PRINTCHR$LEFT$ASC(null)ASCLEFT$RIGHT$"; 4006 [153]"(null)(null)(null)(null)(null)CONT[POSFREPRINTASCLEFT$ASCLEFT$STR$VALASCCONTFREAND_PRINTASCLEFT$STR$CONT_-=^%]!][^POSANDPRINTSTR$VALASC(null)STR$VALASC"; 4007 [153]"!#%!%]]^STR$VALSTR$(null)ASCVALASC[^CONTPOSPRINTSTR$VALASCCONT=^^^^^]^]^^]PRINTASC(null)ASC(null)ASC(null)ASC"; 4008 [153]"CONT(null)(null)(null)^TAB((null)[]PRINT(null)(null)(null)#(null)(null)(null)][^ASCLEFT$STR$^[^^]^^][^^[(null)(null)(null)#(null)(null)(null)"; 4009 [153]"CONT______(null)(null)##!]!#%[^]PRINTASC(null)ASC[^^]^^[]^][^#%![#!#"; 4010 [153]"CONT______-=]^^[]]^^^[PRINT(null)(null)(null)@^^^^^^^^]^[^[]][]^"; 4011 [153]"CONT_____SPC(]\^[^(null)TAB((null)^[]^!#%^^^(null)^TAB((null)(null)(null)(null)^TAB(*^TAB((null)^]["; 4012 [153]"________(null)(null)(null)___(null)(null)^^[]]^]^POSFREAND__________(null)(null)^"; 4013 [153]"______________-=^^^^^^[^^]^NOT____________"; 4014 [153]"__________-FRE=+^[^][[^(null)(null)(null)^TAB((null)_____________"; 4015 [153]"_________SPC(^[]^](null)(null)(null)^TAB((null)___________________"; 4016 [153]"__________(null)^^TAB((null)_________________________";:A[178]2:[137]1100 5000 [153]"LOAD"; 5001 [153]"PRINT (null) 5002 PRINT" [218] [207] [218] [218][205][206] 5003 [153]" (null)(null) (null)(null) (null)(null) (null) (null) (null)(null)MID$(null)(null)"; 5004 [153]" MID$(null) MID$(null)(null)MID$LEFT$(null) (null)(null)(null)LEFT$(null)MID$(null)CHR$LEFT$RIGHT$"; 5005 [153]"DEFKLWAIT PRINTCHR$LEFT$DEFORSIN>RNDCLDEGHIJKLWAITPRINTMID$(null)RIGHT$MID$VALRIGHT$ MID$(null)CHR$VAL(null)STR$VALSTR$VALASC"; 5006 [153]" CHR$LEFT$STR$LISTSGNGETABS PRINTCHR$LEFT$STR$STR$VALASC CHR$LEFT$STR$STR$(null)ASCSTR$ASCVALASC"; 5007 [153]"CONT_____-=PRINTSTR$VALASC#%^CONTPOSFRECOSAND______PRINTSTR$LEFT$ASCSTR$(null)ASCCONT_PRINTASCVALSTR$(null)LEFT$ASC(null)STR$(null)STR$"; 5008 [153]"CONT___-=[]PRINT(null)(null)(null)#]^CONT]^(null)^______PRINTASCVALSTR$(null)(null)(null)[STR$(null)STR$STR$(null)ASC(null)ASCSTR$ASC"; 5009 [153]"CONT__SPC(^]^[!#%!(null)(null)(null)^____-=POS=PRINT(null)(null)(null)@#![ASC(null)ASCASCLEFT$ASCVALSTR$(null)ASC"; 5010 [153]"CONT___(null)(null)(null)^TAB((null)(null)(null)______-=^[^]%!![][[PRINT(null)(null)(null)STR$(null)ASC(null)(null)(null)ASC"; 5011 [153]"CONT______________-FRE=^^[]^^^]^^]^^%#%PRINT(null)(null)(null)@(null)(null)(null)"; 5012 [153]"CONT____-FREFRE=POSFRECOSCOSFRE=^^^]^^^]^(null)(null)^]^]^[^]!#%[%#!"; 5013 [153]"___SPC(\^^[^]^^(null)^TAB((null)(null)^EXPTAB((null)(null)(null)__(null)^TAB((null)^]^]^][^[]["; 5014 [153]"_____(null)^^TAB((null)(null)(null)_________________(null)(null)(null)(null)]^[^]^^"; 5015 [153]"_________________________________(null)(null)(null)(null)^[^"; 5016 [153]"_____________________________________(null)^TAB(";:A[178]2:[137]1100 5100 [153]"LOADPRINT (null) 5101 PRINT" [218] [197] 5102 [153]" (null)(null) (null)LEFT$(null) (null) (null) 5103 PRINT" [202][203][204] [205][206][196][206] [205][206] [207][205][206] 5104 [153]" MID$(null)(null) MID$(null)LEFT$VAL MID$(null)(null) (null)(null)MID$(null)(null) 5107 PRINT" [199][200][201] [202][203][206][203][204] [202][203][204] [202][203][196][197][201] 5108 [153]"DEFORSINLOGLOG*>RND PRINTCHR$LEFT$STR$LEFT$RIGHT$ CHR$LEFT$RIGHT$ CHR$LEFT$STR$LEFT$ASCDEF>RND 5109 PRINT"[155][165][180][149][162][155][181][161][181][182][150][176][191][188][172][153][196][197][197][197][198][150][191][188][188][188][172][153][196][197][198][196][198][155][181][182]LDKL[146] CDEGIJK[146]"; 5110 PRINT"[154]#!!%#[[151][185][155][165][180][149][162][155][181][153][198][203][198][203][196][155][180][181][161][181][161][153][198][200][198][206][198]!^[151][185][175][153] 5111 [153]"[^]^[^^#%!!(null)(null)STR$(null)ASC#]#!%STR$(null)ASC(null)(null)@[]^CONTPOSFREAND_______"; 5112 [153]"^^^[]^^[^]^#%PRINT(null)(null)(null)@[]^^(null)(null)(null)@[#[^[^[^CONTPOSAND_____"; 5113 [153]"^^^^^^[^^^[][!#%##^]^#%!#][^^^^]^]^NOT____"; 5114 [153]"(null)^]^^^^^^[^]^^]^[^]^^[^^]^^^]^^(null)^EXP______"; 5115 [153]"_(null)\(null)^EXPTAB((null)(null)^(null)(null)(null)^^^]^^^]^^(null)^(null)(null)^TAB(^(null)_________"; 5116 [153]"_____________(null)(null)^^(null)^TAB((null)(null)(null)_________________"; 5117 [153]"_______________(null)(null)_______________________";:A[178]3:[137]1100 5120 [128] 5200 [153]"LOADPRINT"; 5201 [153]" (null) 5202 PRINT" [218] [207] [218] [205][206] [218] 5203 [153]" (null)(null)(null) (null)(null) (null)(null)MID$(null)(null)(null)(null)(null) (null) 5204 PRINT" [202][203][206][204] [203][206][218][206][206][202][203][204][206][202][203][204][218] [207] [205][197] [218] 5205 [153]" MID$STR$(null)(null) (null)LEFT$(null)(null)STR$(null)STR$VALASC(null)STR$VALASC(null)(null) (null)(null) MID$(null)(null)(null)(null) (null) 5206 PRINT" [199][203][200][201] [202][197][200][203][197][203][196][197][196][203][198][203][196][203][204] [202][203][204] [202][203][204][202][203][204][205][197] 5207 [153]" CDWAITPRINTCHR$STR$VALRIGHT$FWAITPRINTCHR$(null)VAL(null)STR$LEFT$ASC(null)VAL(null)VALLEFT$ASCLEFT$RIGHT$AWAITPRINTMID$(null)(null)LCWAITPRINTCHR$LEFT$RIGHT$CHR$LEFT$RIGHT$MID$(null)(null)LDWAITPRINT"; 5208 [153]" CHR$VALVALSTR$DEFLOGLOG*PRINTSTR$LEFT$ASC(null)VALASCVALLEFT$VAL(null)ASCLEFT$RIGHT$ CHR$LEFT$RIGHT$ CHR$VALSTR$DEFSINLOGLOGLOGLOG*>RNDPRINT"; 5209 [153]" STR$STR$(null)ASCLISTINTGETINTPRINTLEFT$VALASC(null)ASCLEFT$STR$(null)ASC(null)STR$VALASC CHR$(null)RIGHT$ STR$VALASCLISTINTGETINTGETINTGETINTABSPRINT"; 5210 [153]" POKE-PRINT(null)VALVALASC#!%(null)(null)VALVALSTR$(null)ASC(null)STR$VALVAL(null)STR$ STR$VALASC ASC(null)ASC#%!%#!%^"; 5211 [153]"CONT-=]#PRINT(null)(null)(null)@[^#ASCASC(null)(null)@STR$VALASC(null)STR$VALASCCONT_PRINTASC(null)STR$CONT-=PRINT(null)(null)(null)@]^[^]^]"; 5212 [153]"^]^[%#!#]^%(null)(null)@%!(null)(null)(null)@STR$VALASC](null)(null)(null)@[#%!^[^]]^[^"; 5213 [153]"^^^^]^^]^[#%#[]^!#%#(null)(null)(null)]#!%]]^[]^^]^^[^CONT(null)"; 5214 [153]"^](null)(null)TAB(^EXPTAB((null)_(null)^(null)^[^(null)(null)(null)^TAB((null)[]^]^[^(null)^(null)(null)^TAB(^EXPEXP(null)_"; 5215 [153]"[^POSFRECOS<=POSFRECOSCOSFRE=^]^POSFRECOS<____(null)^TAB((null)____________"; 5216 [153]"^](null)(null)\[^^[^]^^[^]^^]^^][NOT________________"; 5217 [153]"TAB((null)___(null)^TAB((null)(null)^TAB(^TAB(EXPEXP(null)(null)**(null)(null)(null)_________________";:A[178]3:[137]1100 5300 [153]"LOADPRINT" 5301 [153]" 5302 PRINT" 5303 [153]" 5304 PRINT" [218] [218] 5305 [153]" (null)(null) (null) (null)(null) (null) (null) (null)"; 5306 [153]" MID$(null)(null)(null) MID$VAL(null) (null)(null) (null)(null) (null)(null)"; 5307 [153]" MID$(null)RIGHT$LEFT$(null) MID$(null)(null) MID$(null)(null)MID$(null)(null)MID$(null)"; 5308 [153]" CLWAITPRINT CHR$VALASCVALRIGHT$ CHR$(null)RIGHT$ PRINTCHR$(null)RIGHT$CHR$(null)RIGHT$CHR$(null)"; 5309 [153]"EGHHIJKLPRINTWAITCHR$LEFT$STR$(null)RIGHT$ CLDJKLWAIT CWAITPRINTCHR$LEFT$RIGHT$DADEJKLWAITPRINTCHR$LEFT$RIGHT$CHR$LEFT$RIGHT$CHR$(null)"; 5310 [153]" STR$VALASCLEFT$ASC STR$VALASC PRINTSTR$VALASCASCVALSTR$ASC(null)"; 5311 [153]"CONT______-=PRINT(null)(null)(null)(null)(null)CONTWAIT ORWAIT ORWAIT GETABSWAIT GETABSWAIT POSANDWAIT ORLOGWAIT *>WAIT SGNWAIT ORTAB(WAIT (null)" 9103 [153]" CLRSINLOGWAIT RNDFNWAIT SININTWAIT SININTWAIT THEN+WAIT THEN+WAIT -=WAIT SIN^WAIT RNDFNWAIT NEWWAIT SINFREWAIT" 9104 [151]907,1:[151]1015,0:[151]896,3:[151]53248[170]22,24:[151]2040,210 9105 [153][163]10)"(null) VERIFY1987 COBRASOFT INC." 9106 [153][163]9)"POKEDESIGNED AND PROGRAMMED" 9107 [153][163]12)"LISTBY JOERG SIESLACK" 9108 [153][163]5)"DEFPRESS S P A C E TO START GAME" 9109 [153]"PRINT HI SCORE VERIFY000000 PRINTSTAGE VERIFY00 PRINTLIVES VERIFY03" 9110 SC[178][194](861):SC[178]SC[172]256:A[178][194](860):SC[178]SC[170]A 9111 [139]SC[178]0[167]HI[178]HS(1):A[178]14:B[178]934:HI[178]HI[173]10 9112 [139]SC[177]HI[167]HI[178]SC 9115 [139]HI[177]9[167]A[178]14:B[178]934 9116 [139]HI[177]99[167]A[178]13:B[178]933 9117 [139]HI[177]999[167]A[178]12:B[178]932 9118 [139]HI[177]9999[167]A[178]11:B[178]931 9119 [151]211,A:[151]214,23:[158]58640:[153]"VERIFY"HI"":[151]1024[170]B,48:[151]1955,94 9120 [151]53265,155:[141]9150:[151]860,0:[151]861,0:[158]27086:[158]4096:[137]980 9150 V[178]53248:[151]V[170]21,31:[151]V[170]28,15:[151]V,48:[151]V[170]1,180:[151]2040,230 9151 [151]53286,1:[151]53285,11:[151]V[170]39,14:[151]V[170]2,110:[151]V[170]3,180:[151]V[170]40,13 9152 [151]2041,229:[151]V[170]4,176:[151]V[170]5,180:[151]2042,243:[151]2043,174 9153 [151]211,3:[151]214,20:[158]58640:[153]"VERIFY100 250 400 500 1000" 9154 [151]V[170]6,238:[151]V[170]7,183:[151]V[170]42,13:[151]2044,170 9155 [151]V[170]16,16:[151]V[170]8,43:[151]V[170]9,182:[151]V[170]43,8 9160 [142] 9202 [151]53265,65:[153]"LOAD";:[153][163]14)"VERIFYHALL OF FAME":[153]"";:SC[178]SC[172]10 9203 [129]T[178]1[164]10:[153]"";:[153][163]11)"LIST"N$(T)"":[153]"ONONVERIFY" 9204 [153][163]22)HS(T) 9205 [153]"";:T[178]T[170]1:[153][163]11)"PRINT"N$(T)"":[153]"ONONVERIFY" 9206 [153][163]22)HS(T):[130] 9207 [139]SC[177]HS[167]9209 9208 [137]9218 9209 I[178]0 9210 I[178]I[170]1:[139]SC[177]HS(I)[167]HB[178]I:[137]9212 9211 [137]9210 9212 [129]A[178]10[164]I[169][171]1:HS(A)[178]HS(A[171]1):N$(A)[178]N$(A[171]1):[130]A 9213 HS(HB)[178]SC:SC[178]0:N$(HB)[178]N$:N$(HB)[178]N$(HB)[170]" ":[153]""; 9214 [137]9203 9218 [129]C[178]1[164]10:[151]214,3[170](C[172]2):[151]211,7:[158]58640:[153]"VERIFY"C"":[130]C 9219 [151]53265,155:[139]LL[178]1[167]9222 9220 [159]2,8,2,"@0:POINTS,P,W" 9221 [129]T[178]1[164]10:[152]2,N$(T):[152]2,HS(T):[130]T:[160]2 9222 [151]211,11:[151]214,3:[158]58640:[153]"DEFPRESS SPACE TO EXIT" 9223 A[178][194](197):[139]A[178]60[167]9100 9224 [137]9223